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APPLICATION 


A PATTERN EMERGES We provide a 
pattern recognition program that uses many 1407 
of the ideas discussed last week 


HARDWARE 


DRAWING COMPARISONS The 
performance of a supercomputer like the 1404 


Cray-1 provides a telling comparison with a 
Z80-based micro 


MOUSE PIECE The Magic Mouse from 
SMC Supplies is a handy add-on to a 141 0 
Commodore 64 system 








ACTIVE LIST To conclude our Lisp series, 
we show how the language is used to tackle a 14] 
chess-based problem 


FROM QUERY LANGUAGETO RAM 
A weekly glossary of computing terms 


PROGRAMMING PROJECTS 


DO NOT PASS GO! We give the initial set- 
up routine of the Go game for three more 
popular home micros 


MACHINE CODE 


DRIVE CONTROL A look at the hook 
codes available on the Sinclair Microdrive 14) 
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HIGH FIDELITY We Brome a Digital 
Recorder program for the MIDI interface 147 ? 
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Next Week 


-eDigital Research’s Dr LOGO 


is now implemented on a wide 
range of machines, from the 
Amstrad CPG 464 to the IBM 
PC. We take a look at the 
various versions availabie. 
One of the primary areas of 
research in artificial 
intelligence is the creation of 
‘intelligent’ robots. We 
separate the science fact 
from the science fantasy. 
@0ur VDI interface project 
bows out with a look at some 
useful software techniques. 


! nswel To Last Week's Quiz / 
1) In LISP, a list is a collection of dau lems that can be acted 
U 0 whereas a function is a command mm penors a speciic 


2) The MSB of the status byte is set to one. This indicates tha a 
fresh messageis arriving. 


3) A controlled hallucination ae when the computer projects : 


— atemplate from memory onto the picture that iti is “seeing to 
discover whether they match. _ 
4)Ahook code isa byte value used to select a spect routine 
within the Spectrum’ s shadow ROM. | 
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TONY SLEEP AT COMPUTER RECOGNITION SYSTEM 








We continue our investigation into 
computer vision systems, looking at a 
method of scanning patterns for significant 
features. We also develop a BASIC program 
that demonstrates the pattern recognition 
methods used by the WISARD system. 


So-called ‘bottom-up’ pattern recognition 
systems attempt to extract significant features 
from a given image and reduce it to a simpler, more 
highly abstracted pattern. One method of finding 
such features within a pattern is to use local 
operators to scan it. Each local operator scans a 
small area at a time and multiplies the grey 
intensities of the points under the operator by 
weighting factors. These factors are designed to 
produce high scores when the sought-after feature 
is located. By using a number of different local 
operators, the positions of important features, 
such as horizontal, vertical and diagonal lines or 
patches of light and dark, can be extracted. 
Igor Aleksander’s WISARD program, 
described in the previous instalment (see page 
1381), uses the principle of ‘memory address 
generation from a pattern in order to remember 











HANIARER 


arsenite 


What’s That Expression On Your 
Face? 
Igor Aleksander’s WISARD 


: system, developed at Imperial 
. . _ College, London, uses a 512 by 
512 grid and a megabyte of RAM 


in order to recognise patterns 
displayed on a television screen. 
It is So sensitive that it can be 
taught to discriminate between 
smiling and frowning faces 


the pattern and recognise it later. 

The great advantage of WISARD is that all the 
RAM-banks are addressed in parallel. Thus it can 
work at high speed with sharply defined television 
pictures. Our example program in BASIc simulates 
such a system sequentially. It is much slower, but it 
amply demonstrates the principles involved. 

The system uses sextuples for its discriminators 
(these are less powerful than octuples but save 
space), and it requires 20,480 (4064x8) bits of 
RAM, or 2,560 bytes. This is because there are 40 
sextuples, each of which can be in 64 states and 
can thus address a RAM-bank of 64 locations. 
Fach location contains eight bits, which permits 
the system to discriminate between eight different 
classes of input. 

The program has two phases: the first is a 
training stage in which the computer can be given 
examples for each different class of input. The 
second phase involves recognition of a pattern 
by comparison with previously learned.examples. 

For instance, suppose that during the training 
phase, sextuple number 20 gives the response 
110010 (50) when pattern class 4 is present. In this 
case, the fourth bit in location 50 of RAM-bank 20 
will be set to 1. If, during the recognition phase, the 
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Octuple Eye 

Groups of eight pixels are 
arbitrarily connected to eight bit 
registers to form the basis of 
WISARD’s pattern recognition 
system. Each octuple 
corresponds to a bank of 256 
memory locations. During the 
training phase the value in the 
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the octuple forms an address 
within its RAM bank dependent 
on the pixel pattern and a1 is 
written to this address. If the 
same pattern is present during 
the recognition phase then the 
same RAM bank address will be 
generated and the 1 present will 


does not support bitwise AND and OR 











Local Operators 

An example of the kind of low- 
level processing that might be 
employed in a bottom-up 
pattern recognition system is 
illustrated on the far-left. The 
three by three grids are so-called 
‘local operators’, which scan 
over the image data and record 
high scores at edge transitions, 
thus giving a crude outline of 
the picture in terms of straight 
lines. The operators are moved 
across the image data and each 
number is multiplied by the 
grey-level intensity of the 
pattern section over which it is 
placed. Adding products gives 
high scores when the desired 
feature is present, low scores 
otherwise. Each of the nine 
numbers in a local operator is a 
weighting factor; the pattern of 
these weightings determines 
what features will be detected 
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The Favourite’s Form — 

The Cray-1 (pictured above) 
offers the user enormous 
processing power under the 
control of a front-end 
computer such as an IBM, 
DEC, or similar. The 
architecture of the Cray-1 
(shown below) features 32 
Mbytes of main memory and 
4,888 bytes of register space, 
contained within a system 


boasting 3,400 separate 


_ printed circuit boards and 
over 90 kilometres of wire 
connecting them 


DRAWING 
_ COMPARISONS 








The need for powertu 
supercomputers capable of performing 
‘number crunching’ applications is evident 
in many fields. We focus on the Cray-1 as an 
example of this type of machine, look at its 
applications, and compare its performance 
with a Z80-based micro in generating a 
Short animated film. 





The ‘power’ of a computer, in crude terms, is the 
product of its word size, data transfer speed, main 
memory size and central processing unit machine 
cycle speed. In microcomputers, the main 
functions of the traditional CPU are packed into a 
single microprocessor. These microprocessors 
include the familiar Z80, the Intel 8088 and 8086 
and the Motorola M68000. All use MOS (metal 
oxide semiconductor) technology for the logic 
circuits and on-chip memory. Data is transferred 
and processed in parallel either eight bits or 16 bits 
at a time. Clock frequencies in microprocessors 
range from 1MHz to 12MHz. 

Specifications such as these, impressive though 
they are, make microprocessor-based computers 
unable to cope with the colossal amount of data 
processing required in applications such as image 


(TOALL SECTIONS) * 
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processing, and weather 
forecasting. 

Let’s take a specific example. Suppose you are 
making a movie with computer-generated 
animated graphics, and the picture requires a 
resolution of 6,000 by 6,000 pixels and 24 frames 
per second. Since the graphics are animated, the 
position of each point in the picture may move 
between frames, so the position of every point will 
have to be calculated for each frame. That 
translates into 864 million calculations per 
second, and each calculation is likely to be quite 
complex, involving dozens or hundreds of 
machine code instructions. This adds up to billions 
of instructions per second. The Time Trials box 
Shows an approximate comparison of the time 
taken to produce a 10-minute film sequence on a 
supercomputer and a Z80-based micro. 

Supercomputers, as the largest mainframes 
tend to be called, work in much the same way as 
microcomputers; instructions are fetched from 
memory, data is fetched from memory, the data is 
manipulated by the processor according to its 
instructions and the results are stored in memory. 
The chief difference is the scale and speed at which 
these operations are carried out, and the way that 
the parts of the computers are constructed. 

We'll illustrate a ‘typical’ supercomputer by 
referring to the Cray-1 S/4400, manufactured by 
Cray Research. The first Cray-1 was installed in 
1976, only four years after the founding of the 
company. Since then it has established itself as the 
most famous (and one of the most popular) of the 
super mainframes. 

The Cray-1 CPU fills a six-and-a-half foot high, 
semicircular cabinet, shaped somewhat like a 
curved sofa (the cooling system and power 
supplies are housed under the ‘seats’). It gets its 
speed by using bipolar semiconductor logic 
(bipolar semiconductors are ‘ordinary’ transistors 
as opposed to MOS, CMOS, NMOS, FET — field 
effect transistor — and other types of 
semiconductor). ‘The bipolar logic and memory 
comes in over 200,000 integrated circuits on 
3,400 separat2 printed circuit boards, with over 90 
kilometres of wire used for interconnecting them. 

The word size used for computations is 64 bits 
wide (eight times as much data is processed at a 
time than in an eight-bit Z80) and the system clock 
speed is 80MHz (80 million cycles per second). A 
typical 64-bit addition takes just 37.5 
nanoseconds. An eight-bit addition in a Z80 
running at 4MHz (for example, ADD A, n) takes 
1.75 microseconds. 

The main memory in the Cray is an integral part 
of the CPU. It contains 32 megabytes organised as 


fluid dynamics 











4,194,304 words. The memory can transfer up to 
2,260 million bytes per second. 

As you might suppose, the Cray has an 
impressive set of CPU registers. There are 72 
address registers (each 24 bits wide), 72 scalar 
registers (each 64 bits wide) and eight vector 
registers (each 64 words wide). The total CPU 
register space in the Cray is therefore 4,888 bytes 
(the Z80 microprocessor has just 26). 


THE FRONT END 


Unlike most other computers, which are complete 
stand-alone units, the Cray computers are 
designed to be used as extensions to existing 
mainframe or mini computers. The front end 
computer acts as an interface, taking input from 
terminals or card readers, and feeding output to 
peripherals such as printers or magnetic tape 
storage units. 

Between the Cray CPU and the mainframe 
front-end computer lies the Cray I/O subsystem, 
designed to facilitate the high throughput 
demands of the CPU, and a front-end interface, 


designed to match the Cray system to the specific: 


characteristics of the IBM, DEC, Data General or 
other front-end computers. The Cray I/O 
subsystem consists of from two to four I/O 
processors, each of which is a_ powerful 
minicomputer in its own right. 

This description of the Cray-1’s architecture 
barely scratches the surface, though the block 
diagram of the CPU may help to give you an idea 
of its sophistication. There is no space to go into 
the instruction set, the 13 so-called functional 
units that can operate in parallel, or the vector 
processing that allows up to 64 pairs of operands 
to be operated on by a single instruction. Suffice it 
to say that the Cray is a very powerful machine. 





SUPERCOMPUILERS/ HARDWARE 





Supercomputer Applications 


Weather Forecasting 
Weather forecasts are now the results of world-wide 
meteorological data collection, satellite 
communication and computer modelling. A 
computer model of the world’s weather involves 
hundreds of millions of calculations on vast arrays 
of data, with predictions needed in hours. Only 
immensely powerful computers such as the Cray 
can handle data in this quantity quickly enough 


Fluid Dynamics 

Fluid dynamics play an important part in the design 
of fuel-efficient cars, the cooling systems in nuclear 
power stations, aeronautical engineering anc in 
many other applications. Analysing and predicting 
the movement of tluids requires reams of data to be 
analysed. [he problems become immense If real- 
time results are needed. The trouble is that each 
particle in a fluid — and there are countless trillions 
of them — will have an effect on all the other 
particles in the system when it moves. Calculating 
the behaviour of an entire fluid system therefore 
calls for massive computing power 


Economic Forecasting 
Modeis of the economy are notoriously difficult to 
construct. As in fluid dynamics, a small change in 
any part of the system can have effects that ripple 
through the rest of the system. Attempting to create 
an economic model of the entire world is hardly 

| practical, but even simplified models are of mind- 
numbing complexity. Again, extremely fast and 
powerful computers are needed if analysts are not to 
be kept months waiting for results. When time is 
money and speed is of the essence, a 

| Supercomputer can seem a Viable solution 





















































































































Visual Revolution 

From Elton John’s Goodbye 
Yellow Brick Road to Gillette 
advertisements, computer- 
generated graphics are 
revolutionising video and film 
production. Images like these 
can easily be created using 
modern minicomputer and 
micro technology. On a larger 
scale, a Cray-1 was used to 


~ generate over 20 minutes of 


footage for the film The Last 
Starfighter, performing 
calculations that would keep 
an 8-bit micro occupied for 
over 15 years 
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SEKI 


Who Surrounds Who? 






surrounded by the larger 
black group and has only two 
remaining liberties. However, 
this group also surrounds a 
» Smaller black group of three 
stones 


Fatal Mistake 
If black plays onto one of 
white’s two remaining 
liberties, in an attempt to 
capture the white group, then 
white can play onto the 
remaining liberty. As these 
two liberties are shared by 
white and the smaller black 
group, then this black group 
can be removed from the 
board 












Safety 
The white group can now 
make itself safe by forming 
two eyes (See page 1366), 
playing in one of the two 
positions shown. Black 
should have left the two 
Original shared liberties 


Go as SEKI 


The white group is completely 


vacant — a situation known in 


DO NOT PASS GO! 





We continue our Go programming project 
by listing the game’s I/O routines for the 
Commodore 64, Sinclair Spectrum and 


Amstrad CPC 464/664 micros. These 
routines create the board display for the 
game and provide general-purpose 


subroutines for printing messages and 
accepting input. 





As far as possible, the listings given here form the 
equivalent program segment to those given on 
page 1394 for the BBC Micro, and much of the 
description given in the previous instalment’s 
listings applies equally to the Commodore 64, 
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CAROLINE CLAYTON 


Sinclair Spectrum and Amstrad CPC 464/664 
versions of Go. 

To keep things simple, the same line numbers 
are used in all versions of the program; only where 
the differences in machine architecture and BASIC 
dialect become crucial are the original algorithms 
altered. The main differences between the BBC 
Micro version and the versions given here, apart 
from the way in which the four machines handle 
their screen displays, is that the Amstrad, 
Spectrum and Commodore 64 versions of BASIC 
lack procedures and multi-line functions. 
However, we have simulated these features by 
using subroutines. 








3] ABCDEFGHIJKLMNO" 
DIM 1 DERK( A) 








10 GOSUB 390 
350 RETURN 
390 REM READ- MESSAGES ROUTINE 
420 DIM MESS$(9) 
+430 FOR M=0 [fo 9 
440 READ MESS$(M) 
450 NEXT :  . a 

460 DATA "O.K. THINKING...” 

470 DATA "ILLEGAL ENTRY: 

480 DATA ALREADY ON POINT: 

490 DATA "TLLEGAL. KO ON POINT: " _ 

500 DATA "ILLEGAL SUICIDE ON POINT: 

510 DATA "O.K. GAME OVER. PRESS” RUN/STOP. 

















530 DATA 
tT —Sté«CRACVE: (2g) @™* 





HOW MANY HANDICAP STONES ‘MAY 
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Sinclair Spectrum 


10 CLEAR 63999 | 1840 LET pp=PEEK (board+16*y+x ) 
20 DIM 8(300) =. _ | tf hh OU CC} 1850 IF pp-1 THEN PRINT PAPER 

- 30 PRINT AT 10,10;"PLEASE WAIT 70 REM introdu bs INK 2: "O":: Go To 1886 
":; GO SUB 170 : : 1860 IF pp=2 THEN PRINT PAPER 


4O GO SUB 1270 ; INK 7;"0";: GO TO 1880. 
50 CLS : GO SUB 1730 PRINT PAPER 4; INK 0; "+"; 








60 LET move=moverl: REM white NEXT x 
moves here PRINT INK 2:'" ey 
70 IF end THEN’ GO TO 100 NEXT y 





: 80 LET move=move+l: REM black 
moves here : 


1910 PRINT TAB 8; INK 2; ""ABCDEFG 
HIJKLMNO" 
























100 LET ieee: LET amg? LET : 1390 LET ¢(1)=0: LET e(2)=0 — 1930 LET itep=location: GO SUB 2 
 . w=l: GO SUB 1990 _- 1410 ‘RETURN ©  @.8€é8 € = 260: PRINT TAB 20; INK 5;x$ 


110 IF ag="Y" THEN GO 

115 IF a$<>"N" THEN GO TO 100 

(120 LET mp=21: LET mm=6: 

: ="":; GO SUB 2160 

| 130 STOP | L 
170 REM initialise routine 

190 LET black=1: LET white=2: 

ET colours3 _ . 

‘ 200 LET marker=4; LET liberty= =8 | 

220 LET board=64000 i ; 

- - 240 DIM (2) _ _ _Feue det i) ~——™~é~é<“—~*~é=S~SGO LET LG@INKEYS: IF i8-"™ THE 
: 260 GO SUB 390 =~. ~  isec PRINT PRINT “INK 3" 1 N GO TO 2060 

— 490 DIM aca) ss Oke coe the i 2065 IF CODE i$=13 THEN GO TO 2 

K >) 


1g9ho PRINT AT 20,20; INK 5:y$: B 
EEP 1,0 

1950 RETURN 

1990 REM input routine 

2000 LET is=0 

2010 PRINT AT ip,O;:: 
62: PRINT " ";: NEXT 
2020 LET ag$="" : 
2030 PRINT AT ip.0O; INK 7;m$(im) 





FOR i=1 TO 
a 



















2070 IF CODE i$<>12 THEN GO TO 
2090 

2080 IF is>O THEN LET is=is-1: 
LET a$=a$(1 TO LEN a$-1): PRINT 
CHR$ 8;" ";CHR$ 8;: GO TO 2060 

~ 2085 GO TO 2060 

2090 IF i¢$>="a" AND i$<="z" THEN 
_..LET 1$=CHR$ (CODE i$-32) 
2100 IF is<iw THEN LET is=is+1: 
LET a$=a$+i$: PRINT INK 5;1i$; 


ter else weaken)! 
1540 PRINT INK 3; "w411 
|. ", INK @1% red ": INK ¢ 
_ e@with j= 


_ 390 San reg-gesnace routine | 1550 PRINT _INK 3: 


ap advantage." | . 
1560 LET ip=15: LET im=8 
GO SUB 1990 

LET hand=CODE (a$)-4ua 












430 FOR m+1 fo 16 
440 READ m$(m) 















































m . IF hand<2 OR hand>9 THEN 2110 GO TO 2060 
"O.K. THINKING..." ce) TO 1560 
"Illegal entry: " | 1590 RETURN 60. 
"Stone already on poin 1730 REM print-board routine | 2190 PRINT AT mp,0;: FOR m=1 TO 
1750 PRINT o ; INK 6;" Stone | 30: PRINT “ ";; NEXT m 
“"Tllegal. Ko on point: " A G6e pAtad 2200 PRINT AT mp,0O; INK 2:;m$(mm, 
| " _ ._ 1760 PRINT :1 Move " 
| oa Suicide on p 1770 PRINT - |" Whites". Ink 2220 RETURN 
oo 510 DATA “ O.K. GAME OVER." Siecle): 2260 REM int-to-char routine 
520 DATA "" _ 1780 PRINT TAB 10; INK 6;" Blac 2270 IF itep=0 THEN PRINT INK 
_ 530 DATA “How many handicap ato “~~ ' INK 93¢(1)e 5: "Handicap";: RETURN 
nes may I have (2-9) 2?" 12790 PRINT TAB 27; INK 7;move 2275 LET c$=CHR$ (itecp-16* INT (i 
_ = =BAO DATA "Type your move (eg. H 4810 FOR y=15 TO 1 STEP -1 _ tep/16)+64): LET r$=STR$ (INT (4 
| 8), PASS or QUIT . ft . 1820 PRINT AT 17- ¥+ 55 INK 2:(" " tep/i6) ) _ 
550 DATA "Do you want to play a +STR$ y) (LEN STR$ y TO : 2280 PRINT 





gain (Y/N) 2" | 1830 FOR x=1 TO 15 
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QUERY LANGUAGE 


A query language is a component of the operating 
system of a database management (DBM) system. 
It directly accesses, or ‘queries’, the database itself. 
When asked to obtain some information from the 
database, for example, the query language will 
interrogate it in order to find a match within the 
parameters that have been set. Often, the 
interrogation may be performed directly from the 
keyboard — such a system is known as an 
‘interactive query language’. 

It should be noted that a query language is 
basically a list of commands that will be 
interpreted and acted upon by the computer. 
While the query language commands will produce 
a formula by which the computer will interrogate 
the database, the user should not be concerned 
with exactly how the system of retrieval is to take 
place. In other words, the information retrieval 
should be ‘transparent’ to the user. Some of the 
more sophisticated query languages will not only 
search the database for a result that will be 
displayed on the VDU screen, but also, by using 
conditional statements, allow for further searches 
to be initiated. 

Query languages vary in quality and complexity 
depending on the nature of the DBM itself. Some 
merely have simple search routines, whereas 
others may have complicated built-in cross 
referencing facilities. 


QUEUE 

A queue is a First In First Out (FIFO, see page 
576) data structure, as opposed to a ‘stack’ system 
in which data is organised on a First In Last Out 
(FILO) basis. 

Queues are most often used in buffer systems, 
particularly with regard to printers. In this case, the 
information arrives from the computer far more 
rapidly than can be processed by the printer. A 
queue system is therefore implemented to store 
the information as it waits to be sent through. 
Obviously, the information will have to be stored 
in strict sequence, otherwise the words will appear 
as a meaningless jumble on hard copy. 


QUICKSORT 

A quicksort is a method of sorting that, in a list of 
items to be sorted, compares the top and bottom 
items with the items above and below them, 
respectively. Items are exchanged in the list, 
according to the user’s dictates, as the program 
proceeds up and down the file. This process is 
repeated until the sort is complete. 


RADIX 

Each number system has a number of distinct 
digits; the decimal system, for example, has 10 
while the hexadecimal system has 16. The radix 
(also known as the ‘base’ — see page 148) is the 
number of different digits, including zero, used in 


a particular number system. The use of the radix 
has many applications in the mathematics of 
computing and has generated a host of related 
terms. 

The radix point(also known as ‘radix notation’) 
is a character or symbol, usually a full stop, which 
separates the integer in a real number from its 


traditional part. Examples of this are 12.5, 


1000101.01 and 23.FF. 

Among other applications is ‘radix sorting’. Ina 
list of numbers, radix sorting involves finding the 
least significant digits of each of the numbers in the 
list, sorting them and then moving onto the next 
least significant digit until the most significant 
number is reached. 

An alternative method of sorting is the ‘radix 
exchange’. Here, the most significant digits in each 
number are compared, and then sorted into 
subfiles, which are broken down further by 
examination of the next most significant digits. 
This process continues until the file is sorted. 


RAM 

Also known as random-access memory, this is one 
of the most important parts of a computer system. 
A RAM chip is a semiconductor device made up 
of a number of individual cells, often in two- 
dimensional matrices, each of which is able to hold 
a one or a zero. Each cell can be addressed either 
singly or, more commonly, in groups or ‘words’ by 
the processor. The processor can read the value in 
the cell or else write a new value to it. 





There are two main types of RAM chip. 
dynamic RAM holds the values in each of the cells 
by means of electrical capacitance, which needs to 
be regularly recharged or ‘refreshed’. The 
alternative is static RAM, which holds one or zero 
in a cell depending on whether the ‘latch’ (‘flip- 
flop’, see page 608) on the cell is open or closed. 
Dynamic RAM has the advantage of greater 
packing density, whereas static RAM has faster 
ACCESS. 

In the early 1970s, 16 Kbytes of RAM (131,072 
individual cells) was considered a large memory. 
Today, a standard business machine will be sold 
fitted with a minimum of 128 Kbytes, and many 
will have the capacity to contain up to one 
megabyte of data. 


MARCUS WILSON-SMITH 





Memories Of Old 

Advances in chip technology 
have dramatically reduced the 
cost per byte of random access 
memory. The board shown here, 
from a Computer Automation 
Inc. minicomputer built in 1976, 
uses magnetic core technology 
to store around 2K of memory 
on a board that could nowadays 
house 64 256K RAM chips. Note 
the driver chips around the edge 
of the board; each sends current 
along the copper wires to 
reverse the magnetic polarity of 
the relevant bit 
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MOUSE PIECE 


It’s Magic 

The SMC Magic Mouse is one of 
the first mouse-based systems 
to be developed for the 
Commodore 64. Although it is 
not designed as a true WIMP 
(Windows, Icons, Mice, 
Programming) package, it can 
be usefully employed as a 
development tool for 
programmers. The mouse plugs 
into the Commodore 64’s 
joystick port and the icons on 
screen are selected by using the 
three buttons fitted on the 


MOUSE 








Since the introduction of the Apple 
Macintosh, with its mouse-based operating 
system, the micro industry has cast aside its 
initial doubts and eagerly incorporated this 
technology into the home micro market. We 
look here at the SMC Supplies Magic 
Mouse, the first such device for the 
Commodore 64. 


Considering the current popularity of mouse- 
based operating systems, it is perhaps hard to 
believe that initially there was much debate within 
the microcomputer industry as to whether a 
mouse-based system was acceptable, let alone 
desirable. The comparative failure of the Apple 
Lisa, the first micro to have a mouse-based 
operating system, seemed to confirm the 
view that end users did not want these systems. 

The later success of the Macintosh silenced the 
critics, however, and justified Apple’s faith in its 
system. Attitudes have turned around drastically; 
computer manufacturers are racing to produce 
mouse-based machines, and many third party 
manufacturers are issuing mouse packages for 
existing machines. 

The Magic Mouse from SMC Supplies is one of 
the first such products to become available for the 
Commodore 64. Included with the mouse is 
software, on both cassette and disk, containing 





CRISPIN THOMAS 


four application packages. The SMC mouse is 
larger than most similar devices and at 125 by 66 
by 50mm (about 5 by 27 by 2in) it is almost twice 
the size of the Apple mouse. The Magic Mouse 
also has three coloured buttons on the front as 
opposed to the more often used two. The buttons 
are used to select functions which, of course, vary 
depending on the applications being used. Inside 
is a hard rubber ball pressing against a pair of shaft 
encoders. | 

Apparently, the original design called for a 
standard steel ball bearing but this was found to be 
unsuitable, and the launch of the device was 
delayed to allow the rubber replacements to be 
fitted. However, the mouse appears to work 
perfectly. 


UTILITY PROGRAMS 


The Magic Mouse package is not an operating 


system like that of the Apple Macintosh, but 


rather a graphics design facility. The four 
programs provided with the mouse are Hi-Res 
Designer, Sprite Designer, Icon Designer and 
Mouse Controller. 

In order to be able to run the software properly, 
the system file must first be LOADed and the mouse 
cursor calibrated. The disk-based system is 
LOADed automatically with a main menu that 
enables you to select any of the four utility 
programs. The cassette-based system is slightly 
different. Here, the system file is part of the Hi-Res 
Designer and so this program must be LOADed 
before you can use any of the other three. Also, the 
cursor must be positioned on the bottom right- 
hand corner of the screen before starting out. 

The Hi-Res Designer is a ‘paintbox’ program 
looking very similar to that of the Koala Pad 
software (see page 629). When it is loaded, the 
screen changes to a series of boxes, each of which 
contains a different option, such as Box, Draw or Fill. 
By moving the mouse cursor to one of the boxes 
and pressing the red button on the mouse, this 
option will be chosen. Similarly, in order to choose 
either the current foreground or background 
colour, you simply move the cursor to the lines of 
16 available colours and select one. To move to the 
‘canvas’, you press the blue button. | 

The Icon and Sprite Designer packages are ve 
similar and only really differ in their end 
applications. Like most programs of this nature, 
the Sprite Designer presents you with a 24-column 
by 21-row grid. Pixels are turned on by pressing 
the red button when the cursor is over the 
appropriate position. The sprite itself appears in a 
window in the top right-hand corner of the screen, 
and when the cursor moves off the grid, a number 


of options appear in the bottom right-hand 
corner. These are for such applications as 
expanding the sprite, changing its colour or 
moving on to a different sprite. 

The Icon Designer appears almost identical, 
with a grid in the corner and the icon appearing in 
a window at the top. The difference between them 
is that the Icon Designer is used to construct user- 
defined graphics, such as founts and so on, which 
can be SAVEd and reused. 

The final program provided by the Magic 
Mouse software is the Mouse Controller. This 
program does not do anything itself, but rather 
provides the driver software that enables your 
programs to be run from the system. Although at 
first sight this is the least useful of the four 
programs, it does, in fact, have the most potential, 
since it will encourage you to write your own 
software for the mouse. 

The great advantage that mouse-based systems 
appear to have over digitisers is the steadiness of 
the cursor, which allows accurate positioning of 
the lines and colours you wish to draw. A digitiser 
is based around a grid of interconnecting nodes; 
however, its resolution is less than the screen’s. 
Thus when the ‘pen’ is between two nodes, the 
computer cannot decide which position is 
intended and so it tends to jump between the two. 
This, of course, can often have disastrous results 
for the picture you are attempting to construct. 
When using the mouse, however, its cursor reacts 
only to changes in its potentiometers caused by 
movements in the ball, and so the cursor will 
remain steady if the mouse is not moved. 

The system is not perfect, however. Some 
aspects of the Hi-Res Designer are not as friendly 
as those in the other packages. For example, the 
RUB command only allows you to delete errors 
pixel by pixel. This is time-consuming and liable to 
generate further errors if you delete the wrong 
pixels. A much better method is one that deletes 
all additions to the canvas since you last went to 
the menu screen. This means, of course, that a lot 
of good work will be deleted in the process, but at 
least you will be able to start with a clean sheet. 

The Magic Mouse manual provides an 
excellent tutorial. Each of the programs has botha 
full explanation of how the development software 
works, and programming information to allow 
you to incorporate the finished product into your 
own software — including sample programs. This 
shows a great deal of foresight on the part of SMC, 
and it should be congratulated for its thorough and 
useful manual. 

Although the SMC Magic Mouse is far from 
being the Macintosh Emulator, the company has 
obviously developed the initial software as a 
programmer’s tool, similar to the AMX mouse 
(see page 1050) orthe DR GEM software. The 
company doubtless hopes that programmers will 
produce additional software that will 
consequently enhance the system’s attraction. 
This approach may not produce quick sales, but it 
is likely to ensure a long life for the Magic Mouse. 





JOHN CLEMENTSON 


Artistic Development 

These pictures were built up 
using the Hi-Res Designer 
application program for use with 
the SMC Magic Mouse. The 
program allows the usual 
commands that are available 
with these types of packages, 
including LINE, DRAW, FILL and 
CIRCLE. Up to 16 different 
colours can be used to make up 
the picture, and a wide range of 
different ‘brushes’ are available, 
which vary the thicknesses and 
textures of the lines 


£09.99 inc VAT 


The Magic Viouse piugs into 
the Commodore 64 s joystick 
or 


four applications programs on 
both disk and cassette 


The manual gives full details 

on how to set up the mouse, 

use the existing software and 

incorporate the results into 
Our OWN programs 


The mouse appears well-built 
and reliable and users should 
have little trouble transferring 
the Sprites and user-defined 
graphics into their own 
programs 


The total package lacks the 
scope of many other mouse- 
orientated programs and may 
find itself left behind by more 
sophisticated packages 
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His Micro’s Voice 

Our diagram shows how a 
single note would be recorded 
using the Digital Recorder 
program. During the recording 
phase the synthesiser sends a 
‘note on’ message as the key is 
pressed and a ‘note off’ 
message when the key is 
released. These messages are 
stored in memory, together with 
timing information that records 
how many 2 millisecond 
periods elapse between one 
event and the next. The timing 
information between the note on 
and note off messages is held in 
two bytes in our example, 
showing how timer overflow is 


_ dealt with. During playback the 


program uses the timing 

- information to delay 
transmission of the note 
messages so that the same 
‘articulation’ is reproduced 





Having discussed the hardware and software 
specification for our MIDI interface and 


—constructed the board, we turn our attention 


to the development of a program that will 
allow the computer to act as a real-time 
digital recorder and playback device. 








When the keys on a MIDI keyboard are pressed, 
or a controlling device such as a pitch bending 
wheel is activated, then these ‘events’ are 
transmitted in the form of data bytes to the MIDI 
OUT socket on the back of the synthesiser. Much 
of the previous instalment (see page 1386) was 
concemed with giving details about the meanings 
of these byte values so that we can write programs 
to accept MIDI data and process it. The computer 
can also be used as a source of MIDI data, which 
can be transmitted to a synthesiser in order to 
activate its sound generating circuits. An obvious 
example of this second use is to set the computer 
up as a sequencer, allowing musical sequences to 
be entered and edited in ‘step-time’ (programming 
individual steps within a bar) from the computer 
keyboard. This is done prior to transmission via 
MIDI to activate the synthesiser that will play the 
tune. In fact, this is a relatively simple task; MIDI is 
capable of much more. Imagine a sequencer that 
used all 16 MIDI channels to control an array of 
different keyboards and a drum machine! __ 
We can combine several aspects of the way in 
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which a computer can be used to interact with 
MIDI instruments by tackling the relatively 
Straightforward task of designing a piece of 
software that can record a tune played in real-time 
in the computer’s memory. Then, in response to an 
instruction, the program will replay the tune over 
MIDI back to the synthesiser. This is, of course, a 


Ok A AS RRS 


digital recording. 

Although superficially similar to analogue 
recording using a tape recorder and magnetic tape, 
digital recording via MIDI is radically different. 
When a recording is made on a piece of tape the 
actual musical sounds are encoded into magnetic 
patterns on the tape surface, and the position of 
these patterns on the tape determines the order in 
which the sounds are to be reproduced during 
playback, as well as the time intervals between one 
sound and the next. Imagine two notes being 
recorded in this way where there was, say, a two- 
second gap between the first note and the second. 
In this interval, the tape would continue to pass the 
tape heads although nothing would be recorded. 
When the tape was replayed, the length of this 
blank section of tape would determine the time 
interval between the listener hearing the first note 
and the second. 

In a digital recording system that uses MIDI, the 
two notes would correspond to two keypress 
events, each generating a MIDI message. The 
problem with a real-time recording is that we must 














have some way of recording the time interval 
between the computer receiving the first MIDI 
message and the second. Using the tape recording 
analogy the obvious way to do this would be to 
store the messages in a memory array, storing 
‘blank’ byte values for each time unit in the 
interval. Thus, during playback, the two notes 
could be played back with the correct intervening 
time interval. It is not difficult to see that this 
method of recording MIDI events in real-time is 
potentially very wasteful of precious memory. 

An alternative to this simplistic analogy of an 
analogue tape recorder is to record timing 
information in byte form rather than ‘blank’ byte 
values. For example, if there are 50 time units 
between the first note and the second then a timing 
byte containing the value 50 will be entered in the 
memory array rather than 50 ‘blank’ bytes. 

This achieves a considerable memory saving, 
but also makes it difficult to predict the maximum 
length of a tune that can be recorded in a given 
amount of memory. Tunes that involve fast 
fingerwork, for example, will require more bytes 
to record the large number of note on/off 
messages transmitted by the synthesiser than a 
slower piece of the same length. Using the pitch- 
wheel also tends to eat up large amounts of 
memory because of the number of MIDI messages 
its operation generates. 


DIGITAL RECORDER PROGRAM 


In the program we provide here, we will therefore 
need some kind of counter to record the time 
intervals between events. The counter we use 1s a 
variable called CLOCKS. The rate at which this 
counter is incremented sets the accuracy with 
which the timing can be determined, and thus the 
fidelity of the recording. A trade-off results when 
selecting the optimal time interval — we have 
chosen an interval of about two milliseconds. This 
is not so small as to be less then the execution times 
of the routines, but not so large as to adversely 
affect the accuracy of the recording. This time 
interval is called the resolution of the recorder, 
since it is the smallest time interval that can be 
recorded. ‘The interval is generated by a timer on 
one of the CIA or VIA chips on the micro. 

The MIDI message format must be slightly 
extended to take timing into account. This is done 
by placing before each MIDI message a single byte 
that represents the number of time intervals that 
have passed since the last message. This single byte 
can record up to 239 time units, and so can have 
values from $0 to SEF. 

If 240 intervals pass without a message being 
received, an overflow message is recorded. This 
overflow message is the single byte SFO. Finally, a 
single byte message, SFF, has been chosen to mark 
the end of the sequence. Byte values SF1 to SFE are 
reserved for your own program markers. 

In the final section of this MIDI project we will 
give a version of the Digital Recorder program for 
the BBC Micro and point the way for aspiring 
MIDI programmers to implement their ideas. 








PHOTO OF PIANOLLA ROLLS : MARCUS WILSON-SMITH 


Program Operation 

Operation of the Digital 
Recorder program for the 
Commodore 64 is 
Straightforward. Selecting the 
record option will record events 
arriving at MIDI IN. Recording 
stops when either the available 
memory is used up or the Space 
bar is pressed. The playback 
option will then reproduce the 
recorded sequence of events at 
MIDI OUT. Playback continues 
until either the Space bar is 
pressed or the end of the 
sequence is reached. A 
subsequent recording will 
overwrite the old one 
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ACTIVE LIST 


In this last instalment of our series on LISP, 
we look at a few more functions normally 
found in the language and demonstrate 
them with one or two slightly more complex 
examples. First, however, let’s see why it is 
often useful to know how Lisp represents 
data structures. 





In order to ee a Altern mer that c can sien 
deal with identifiers, characters, numbers and lists 
in the same manner, Lisp refers to everything via 
‘pointers’. Pointers can be easily simulated in any 
language, including BAsic. For instance, if you give 
the instruction: 


POKE 100,55 
Or: 
2100 = 55 : 299 = 100 (BBC Micro/ Electron) 


then locations 100 and 99 would contain the given 
values. It is possible to consider the value in 
location 99 as a pointer to location 100. So if we 
were to give the command: 


PRINT PEEK (PEEK(99)) 
Or: 
PRINT 2(299) 


we would get the answer 55. Note that on some 
micros, locations 99 and 100 may be in ROM, so 
will not change. 

It is, of course, possible to create pointers to 
anywhere in memory, but if the location lies above 
290, then it will be necessary to combine two bytes 
to give the range 0 to 65535. Now, if we assume 
that, in turn, the value 55 is a pointer to a further 
location, and so on, we will get the list structure as 
shown. 


POKE 99,100 (Most micros) 


REFERENCE 10 THE START OF THE LIST 






a” POINTERS 
3 , “a 


“TAIL’ OF THE LIST 

Unfortunately, this is of little use as yet because the 
list holds no information. This is achieved by 
combining locations to give two pointers at each 


‘HEAD’ OF THE LIST 


node. 











We can now use this to represent the list: 
(ABCDE...) 


This is fine for infinite lists, but we must be able to 
stop them. This is easily done by having the final 
pointer refer to the empty list (or NIL construct), 
which we have seen previously (see page 1384). 
Consequently, we get the finite list: 


(ABCD) 


best 
3 


A list containing a list simply means that one of the: 
left-hand pointers points to a new list, instead of an 
atom as in the previous case. So the list: 


((AB C) DEF) 


would be represented as shown: 





It should now be clear how the functions CAR and 
CDR work. CAR (the head ofits argument) is just the 
left-hand pointer of the first node of its argument. 
Conversely, CDR (everything but the head of its 
argument) is merely the right-hand pointer of the 
first node. So, if we call the complete list L, then: 


CONS((CAR L) (CDR L)) 


gives the original list L, as its result. 

We can thus see that CONS is a method of 
building lists. It forms its two arguments into anew 
list and returns as its result a pointer to the first 
item of the new list. It is possible to create any list 
structure using CONS, though the number of CONS 
calls can become tedious — hence the shorthand 
function LIST. 

It should be noted that it is always preferable to 
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add new information to the head of a list using | 


CONS. When adding to the tail of a list, it is 
necessary to create a copy of the original list, but 
with the original final pointer pointing to the new 
item. 

Some versions of Lisp have an instruction to do 
this automatically (APPEND), but it is not as 
efficient as CONS. If speed is essential, then it is 
sometimes possible to use an instruction to change 
the required pointer in the original list, rather than 
generate a copy — but this sort of ‘fiddle’ is often 
frowned upon by purists. 

To conclude this series, we'll look at a complete 
worked example of a well-known problem. The 
problem is to place eight queens on a normal chess 
board, such that no queen attacks any other. 
Obviously, there must be exactly one queen in 
each column, and one in each row. The problem 
thus remains to order either the rows or columns so 
that no two queens intersect along any diagonal. 


EIGHT—-QUEENS PROBLEM 


Imagine that every column on the chess board 
contains one queen. These will be ordered (1 to 8) 
according to their places in a list called QUEENS. 
The queen’s row (specified by the value in 
QUEENS) will be variable, calculated by Lisp. 






stsusnasetodd 


QUEENS (Q1 Q2 Q3 Q4 Q5 Q6 Q7 Q8) 


Bs 


The program begins with the list QUEENS being 
empty. At each stage, a new queen will be placed in 
row | at the beginning of the list. The position of 
this queen, and possibly others, will be amended 
(function ALTER) until all of the queens are in safe 
positions. This new list will become QUEENS, and 
new queens will be added to the start, and so on. 

This continues until the list contains eight 
queens, at which point they are printed out using 
PR__BOARD. The initial function, which we will call 
SOLVE, can thus be written as: 


(DEFUN SOLVE () 
(SETQ QUEENS ()) 
(LOOP (UNTIL EQ (LENGTH (QUEENS) 8)) 
(SETQ QUEENS (ALTER (CONS 71 QUEENS)))) 
(PR_BOARD ’(QR QN QB Q K KB KN KR) QUEENS)) 


You can see here that SOLVE, with no arguments, 
initially sets up the empty list QUEENS. The LOOP 
function then sets QUEENS to the new value of the 
ALTERed list of a queen in row 1, followed by the 
previous list. This LOOP is executed UNTIL the 
LENGTH of QUEENS is EQuivalent to 8. The final list 
will then be printed. 
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We have used three new functions here. LENGTH 
merely returns the number of elements in its 
argument, and is defined as: 


(DEFUN LENGTH (L (N)) 
(SETQ N O) 
(LOOP (WHILE L N) 
(SETQ N (ADD1 N)) 
(SETQ L (CDR L)) )) 


The argument N, given in brackets, is Acornsoft 
LisP’s way of showing optional arguments. In this 
case, N is never passed to the function, and so it just 
acts as a local variable. 

The other function, PR_.BOARD, combines the 
elements of its two argument lists to produce 
understandable output. The function is: 


(DEFUN PR_.BOARD (ROWS COLS) 
(COND ((NULL ROWS) T) 
(T (PRINTC (CAR ROWS) (CAR COLS)) 
(PR__BOARD (CDR ROWS) (CDR _COLS)) ))) 


Both lists are assumed to be of the same size, so the 
function terminates if the first condition is true (a 
list is empty). Otherwise, the first element of each 
list is printed (with a carriage return), and the 
function will call itself for the remainder of each 
list. 

The third function, ALTER, is the one that does 
all the work. It is defined as: 


(DEFUN ALTER (QUEENS) 
(COND ((EQ (CAR QUEENS) 9) 
(ALTER (CONS (ADD1 (CADR QUEENS)) 
(CDDR QUEENS) ))) 
((SAFE QUEENS) QUEENS) 
(T (ALTER (CONS (ADD1 (CAR QUEENS)) 
(CDR QUEENS) ))))) 


ALTER works by first checking to see whether the 
most recently placed queen has been moved off 
the top of the board (row 9). If this is the case, then 
one or more of the previously placed queens must 
be moved. 

Remember that this queen started in row 1, and 
will have been checked in all the other rows (by the 
third condition of ALTER) so it must be the case that 
it is impossible to place it with the board in the 
present situation. Consequently, ALTER calls itself 
with the remainder of the list QUEENS (everything 
but the present queen). 

When doing this, it also increments the row of 


_the last queen. This is called ‘backtracking’ and is 


fairly common in computer algorithms of this 
type. If the second condition evaluates to TRUE, 
then all the queens on the present board will be 
SAFE, and the list will be returned. Otherwise, the 
position of the most recently placed queen will be 
incremented, and tried again. 

The only undefined function here is SAFE, which 
must check whether all the queens on the present 
board are safe. Since the position in the list QUEENS 
defines the column, and no two queens can have 
the same position in the list, there is no need to 
check for intersecting columns. This leaves just the 
rows and diagonals to check. If we assume that we 








have a function NOCHECK which returns TRUE if no 
queen is ‘checking’ any of the queens preceding it, 
then SAFE can be defined as: 


DEFUN SAFE (QUEENS 


COND ((NULL QUEENS) T 
T (AND (NOCHECK (CAR QUEENS 
CDR QUEENS) 1 


SAFE (CDR QUEENS 


It may be easier to understand this by defining the 
word SAFE in terms of itself: 


‘The first queen in the list QUEENS does NOt CHECK 
any of the queens in the rest of the list, AND all the 
queens in the rest of the list are SAFE.’ 


It now only remains to define the function 
NOCHECK, which should return TRUE if there are no 


intersections occurring along rows or diagonals. 
This will look like: 


DEFUN NOCHECK (NEW REST COL 
COND ((NULL REST) T 
T (AND (NOT (EQ NEW (CAR REST 
NOT (EQ COL 
ABS (DIFFERENCE NEW (CAR REST 
NOCHECK NEW (CDR REST) (ADD1 COL 


Here, NEW is the recently placed queen, and REST 
is the list of the other queens on the board. 


Assuming that there are other queens on the board 
(NULL REST is FALSE), the AND function returns true 


if: 


1. The present queen’s row is not the same as the 
row of the first queen in the rest of the list. 





2. The queens are not on the same diagonal. This 
is checked by ensuring that the ABSolute row 
difference, is not the same as the COLumn 
difference, where COL holds the number of 
columns separating the present queen from the 
next queen in the list (initially 1). We have already 
defined ABS in the previous instalment as: 


DEFUN ABS (NUMBER 
COND ((MINUSP NUMBER) (MINUS NUMBER 


T NUMBER 


3. 1 and 2 hold true for the present queen and the 
next queen in the list. This is checked by the 
function calling itself with everything but the first 
element of REST and incrementing the COLumn 
difference. 


The necessary definitions are now complete, and 
the illustration shows the solution when it is run. 


If you have a Lisp implementation, you might 
like to try these routines. Remember that this has 
been written using Acornsoft Lisp, but shouldn't 
need much alteration to work on other systems. 
The backtracking can become quite complex, but 
you could easily follow it by printing the list 
QUEENS within the function SOLVE, just before 
each call to ALTER. 

The top-down programming approach to the 
Eight-Queens problem illustrates how easy it is to 
define Lisp programs on a function-by-function 
basis. For instance, we used SAFE in ALTER before 
writing it. This final example should also serve to 
prove what a versatile language LISP really is, and. 
encourage you to try out your Own programs. 


SR 


caemunRREaR 
ay x 
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DRIVE CONTROL 





Having looked at the hook codes used by 
the Interface 1 in the last instalment (see 
page 1398), we now consider the functions 
of those provided for the operation of the 
Spectrum’s Microdrives. Many of these 
hook codes can be put to great use by the 





use of hook codes (see page 1398) or by calling 
Interface 1 ROM routines directly. However, the 


latter procedure is not always a good idea as more © 


than one Interface 1 ROM may be present. So 
here we will examine the 13 hook codes that have 
been provided to allow us to use the Microdrive. 

Before we do this, let’s look at some of the 
principles behind the use of Microdrives. After a 
cartridge has been formatted it will be divided into 
255 ‘sectors’, which can be regarded as the physical 
unit of information storage on a cartridge. Each 
- sector consists of a header (data which contains, 
among other things, the name of the cartridge), 
a data block, which will eventually hold the 
name of the file that is using this sector, some other 
data and a 512-byte data record. The formatting 
operation also marks for future reference any 
sectors of the tape in the cartridge that are not 
usable. 

Like all other communication with I/O devices 
in the Spectrum system, communication between 
Microdrives and the Spectrum is carried out via a 
channel. For microdrives, this takes the form of a 
595-byte area of memory. Associated with a 
Microdrive channel is a 32-byte Microdrive map, 
which is set up by the operating system to tell the 
various routines which of the sectors are free for 
use. It will show those sectors that are unusable 
and those that have already been used for storing 
other information. 

The channel is stored in the area of the 
Spectrum memory map called the ‘Microdrive 
Channel Area’. Whenever a channel is set up, the 
memory between the end of the Microdrive 
Channel Area and STKEND is moved upwards in 
memory to make space for it. Similarly, when such 
a channel is no longer needed it is closed and the 
memory moved down again. 

Microdrive channels are set up by the system in 
two ways: explicitly, when a file is required by an 
OPEN command, or implicitly , when the system 
opens a channel to perform an operation. This is 
the type of thing done by the Microdrive SAVE 
command — the channel opening is said to be 
‘implicit’ because it is implicit that a channel be 
opened to perform the command, even if we will 
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not use it directly. A channel that is opened 
explicitly must also be manually closed, whereas 
this is done automatically for an implicit channel. 

We provide a diagram showing the structure of 
a Microdrive channel. You may notice the 
similarity between the first few bytes of this 
channel and the channels that we set up to send 
information to the screen or read data from the 
keyboard (see page 1317). Most of this 
information is for interest only; we generally don’t 
have to bother with accessing the Microdrive 
channel information directly. 

The Microdrive map address is held in the 
channel, and we can get an idea of the available 
space on a cartridge by examining the map of that 
cartridge. Indeed, this is how the sBasic CAT 
function provides you with data about the amount 
of space remaining on a cartridge. If you want to 
look at a Microdrive map, then try the following 
routine (type in NEW first). 


10 OPEN #5;“M”;1;“testprog” 

20 start=PEEK(23870)+256* PEEK (23871) 

30 FOR l=start TO start+31 

40 LET sector=PEEK(l) 

50 FOR J=1 TO 8 

60 IF sector/2=INT(sector/2) THEN PRINT “0”: 
70 IF sector/2< >INT(sector/2) THEN PRINT “1”; 
80 LET sector=sector/2:LET sector=INT (sector) 
90 NEXT J 

PRINT 

110 NEXT I 

120 CLOSE #5 


On running this program, a 1 indicates an 
unusable or used sector, and a 0 indicates a free 
sector. You might like to consider altering this 
program to print the amount of free cartridge 
space to the screen. 

With regard to the large, 512-byte section of 
data in the channel structure diagram, the OS fills 
this with the data to be written. The data is written 
to the cartridge if either the buffer is full, or a 
CLOSE# command (or its hook code equivalent) is 
executed. In the latter case, the buffer is written to 
cartridge and that record is marked as an ‘End Of 
File’ (EOF) record. It can also be written in a third 
instance using a hook code, as we'll see later. 
Under normal conditions, therefore, the cartridge 
will be written to at 512-byte intervals. 

Let’s now look at the hook codes used to control 
the Microdrive. 


MICRODRIVE HOOK CODES 

@ Hook Code 33: This starts up the motor in a 
specified Microdrive unit (a process that is often 
called ‘selecting the drive’). The Microdrives are 








numbered from one to eight. The routine can also 
be used to turn the motors of all Microdrives off. 
There is one important point to note here, and that 
is that the routine can return with the interrupts 
disabled. So, if you use this routine, on returning 
from it the first thing you should do is issue an El 
command. 

_ The routine is simple to use. First, set the A 








register to hold the number of the drive that you 
want to turn on. Then use RST #8 to call the hook 
code. Placing the value 0 in the A register will turn 
off the drives. Alternatively, the Microdrives can 
be turned off by generating an error in BASIC. 
Errors can be generated by this hook code in two 
ways: if you try to turn on a drive that is not 
connected, and if you try to turn on a drive without 
a formatted cartridge in it. 


®@ Hook Code 34: This very useful call enables us 
to open a file on a cartridge. We'll look at the 
setting up needed for this call shortly. However, 
once called, the routine will check the drive for a 
file of the name that you've given. If one is found, 
then the file will be opened for reading. If not, then 
it will be opened for writing. This is reflected in the 
state of the Read/Write flag of the channel that 
this call sets up: bit 0 will be 0 for a read file and 1 
for a write file. 3 

A file can be opened several times for reading, 
and each time it is opened a new channel will be set 
up, even if the one set up for a previous read 
operation is still active. 

Let’s consider what actually happens when you 
use this call. The system variables that are set up by 
Interface 1 are required, and so if there is any 
doubt about whether they are present you should 
use hook code 49 to set them up. The drive 
number is then stored in address 23766 and 23767, 
lo-byte first. Addresses 23770 and 23771 should 
then be set up to hold the length of the name you 


want to use for the file, and addresses 23772 and 


23/73 hold the address of the file name in memory. 
In both these cases, the values are stored lo-byte 
first. A useful place to store the file name 
temporarily is in the printer buffer. 

An EXX instruction must be executed and the 
HL’ register pair saved on the stack before this 
routine is used, and should be restored before a 
return to BASIC is made. The hook code is then 
called in the usual fashion with RST #8. On return, 


a channel will have been set up in the Microdrive 


Channel Area and the IX register will be holding 
the address of the start of the channel. Errors that 
can be generated by this call are as follows: 

1. The file that you want to open is nota data file. 
2. The first sector ofa file being opened for read 
cannot be found. 

3. You've tried to open a write file twice. 


@Hook Code 35: This allows us to close a 
Microdrive file that has been opened with hook 
code 34. If the file was open for writing, then any 
data that is in the data area of the channel that has 
not yet been sent is written to the cartridge. For a 
read file, any data that has been read in and is still 
in the channel data area will be lost. The channel is 


Microdrive Channel Structure 
The Microdrive channel 
occupies 595 bytes of memory. 
Its location is returned in the IX 
register after opening a file on 
cartridge using hook code 34 
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then reclaimed by moving the area of memory up 
to STKEND down over it. The routine is called with 
the IX register holding the address of the start of 
the channel we have specified. Again, it’s a good 
idea to preserve the alternative HL register pair 
before use. An error is generated if there is 
insufficient room on the cartridge to close the file. 


@ Hook Code 36: This allows us to delete a 
Microdrive file, whether it’s a data file or a 
program. The file name, its address and length, 
and the drive number are all set up in the same way 
as for hook code 34. 

Now that we've seen how we can open and close 
files, it would obviously be useful to be able to 
write and read data from those files! It is possible 
to attach a Microdrive channel to a stream, but the 
easiest way is to make the Microdrive channel the 
‘current’ channel for reading or writing (replacing 
the usual keyboard and _ screen streams 
respectively). | 

The simplest way to write data to the 
Microdrive channel is to use RST #10, after setting 
the Microdrive channel as the current output 
channel. We do this by setting the system variable 
CURCHL, at 23633 and 23634, to hold the start 
address of the Microdrive channel. This is done by 
a single command: 


LD (23633) ,1X 


where IX holds the start address of the channel, as 
returned by hook code 34. Once this has been 
done, RST #10 will write bytes of data into the 
Microdrive Channel Area, rather than to the 
screen. This again demonstrates the sheer 
versatility of the stream and channel system on the 
Spectrum — a much neglected aspect of the 
computer’s OS. As we mentioned earlier, as soon 
as the data buffer is full it will be written to 
cartridge. Thus, to write a file called FRED to a 
cartridge, we could use the following piece of 
code: 


turite file "FRED" to microdrive 
3E81 Id a,! 
32D65C Id (23764) ,a 
AF xor a 
32D79C Td (23767) ,@ 
212B29 Id hl,name 
22DC5C Id = (23772) ,hl 
218406 Id hl,4 
22DASC Id (23776) ,h] 
D9 OXXx 
ED push hl 
D9 BXX 
CF rst #8 
22 defb 34 
0D22515C Id (23633) ,ix 
Q6FF Te. —by255 
C3 loop: push be 
3E08 Id a,CHAR 


:drive number 
istore drive number 
yzero a register 


yget name in hl 
;store filename 
s4=name length 
store name length 


spreserve hl’ 


shook code 34 
;CURCHL=drive channel 
;200 bytes infile 
spreserve counter 

ruser would need to 
;insert routine to get 
scharacter from wherever 


Cy 


46524544 name: 


rst #18 
pop be 
djnz loop 
rst #8 
defb 35 

Id a,2 
call #168! 


ret 
defm "FRED" 
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jinto a register 
swrite to channel 
yrestore counter 
iclose file 
;output to screen 
yrestore HL 


;reenable interrupts 


:filename 





Obviously, if you open a couple of files it’s 
necessary to save the channel start addresses of 
each channel in some safe area of memory (so that 
they can be used to close the files, and so on). Our 
routine generates a file of 255 characters to the 
cartridge. 

Reading the data from such a file is also 
straightforward; the file is opened as before, and 
CURCHL made to hold the start address of the 
Microdrive channel. The Spectrum routine at 
#15E6 in the main ROM 1s then used to read a byte 
from a channel. The byte thus read is returned in 
the A register. 


@ Hook Code 37: When called, with IX holding 
the channel start address, this routine will read in 
the next record within a file, placing the data in the 
data area of the channel. If the read is successful, 
then the value of CHREC will be incremented. Once 
data has been read in this fashion, it obviously 
replaces what was previously in the data area of the 
channel. 


® Hook Code 38: It is possible to write data to 
cartridge using a hook code that writes the data 
area of the channel in question to tape. This 
routine — hook code 38 — is entered with IX 
holding the channel start address. Note that any 
data area written to cartridge with less then 512 
bytes in it can be treated by the Spectrum 
operating system as a ‘free sector’ unless it is 
marked as being an ‘End Of File’ record. Thus, the 
‘Close File’ hook code should be used to write the 
last block of data to tape if its got less than 512 
bytes in it. Once hook code 38 is called, the current 
contents of the data area are written to file. 

A final useful read routine allows us to read in a 
certain record within a file. This is hook code 39. 
For this routine [IX holds the start address of the 
channel we wish to access, and CHREC holds the 
desired record number. 

There are other hook codes for manipulating 
Microdrive files, but these are of less use to us in 
day to day programming. Hook code 40 allows the 
data held on a particular Microdrive cartridge 
sector to be read in. Again, CHREC holds the sector 
number we wish to access. Hook code 41 reads in 
the next sector from the Microdrive cartridge, and 
hook code 42 writes data to the next free sector. 

The final two hook codes we'll look at are used 
to manipulate Microdrive channels. Hook code 43 
should produce a channel and a cartridge map. 
However, in the first version of the Interface 1 
ROM there was a bug in this routine that resulted — 
in it doing the same job as hook code 34. It does 
work in later versions of the ROM, though. Hook 
code 44 deletes a channel, and the associated map, 
which has its start address held in the IX register. 

As a final point, care should be taken when you 
are experimenting with hook codes, because the 
write-protect system used by the Microdrive is for 
software only. A crash can therefore corrupt a 
cartridge! 
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